home *** CD-ROM | disk | FTP | other *** search
/ Varios Español / Varios Español.iso / ADERJ503 / INSTR53.BAT < prev    next >
DOS Batch File  |  1994-12-15  |  4KB  |  162 lines
  1. ECHO OFF
  2. cls
  3. IF %1X==X GOTO ERROR
  4. IF %1==/H GOTO ERROR
  5. IF %1==/h GOTO ERROR
  6.  
  7. rem PROMPT $H
  8. IF NOT %1==A: IF NOT %1==a: IF NOT %1==B: IF NOT %1==b: GOTO ERROR
  9. IF NOT %2==C: IF NOT %2==c: IF NOT %2==D: IF NOT %2==d: GOTO ERROR
  10. echo INSTALACION DE LA APLICACION DE ARQUITECTURA Y OBRA PUBLICA.
  11. echo                     PARA AUTOCAD V12 Y POSTERIORES
  12. ECHO CREANDO DIRECTORIOS
  13. MD %2\ADEROJAS
  14. MD %2\ADEROJAS\1
  15. MD %2\ADEROJAS\2
  16. MD %2\ADEROJAS\3
  17. MD %2\ADEROJAS\4
  18. MD %2\ADEROJAS\5
  19. MD %2\ADEROJAS\6
  20. MD %2\ADEROJAS\7
  21. md %2\ADEROJAS\7\vehiculo
  22. md %2\ADEROJAS\7\escalera
  23. MD %2\ADEROJAS\8
  24. MD %2\ADEROJAS\9
  25. MD %2\ADEROJAS\10
  26. MD %2\ADEROJAS\11
  27. MD %2\ADEROJAS\12
  28. MD %2\ADEROJAS\SEGU
  29. MD %2\ADEROJAS\OBRA-P
  30. MD %2\ADEROJAS\OBRA-P\20
  31. MD %2\ADEROJAS\OBRA-P\21
  32. MD %2\ADEROJAS\OBRA-P\22
  33. MD %2\ADEROJAS\3\CHIMENEA
  34. MD %2\ADEROJAS\PRAINSA
  35. MD %2\ADEROJAS\ACCESORI
  36. MD %2\ADEROJAS\REGULACI
  37. MD %2\ADEROJAS\VALVULAS
  38. MD %2\ADEROJAS\3D
  39. md %2\ADEROJAS\3d\3dpared
  40. md %2\ADEROJAS\3d\3dmueble
  41. md %2\ADEROJAS\3d\3dsanit
  42. md %2\ADEROJAS\3d\3dcarpin
  43. MD %2\ADEROJAS\USUARIO
  44. MD %2\ADEROJAS\ROCA2D
  45. MD %2\ADEROJAS\LANDIS
  46. MD %2\ADEROJAS\MAQUINA
  47. MD %2\ADEROJAS\LAMINADO
  48.  
  49.  
  50. REM echo off
  51. set org=%1
  52. set des=%2\ADEROJAS
  53. SET DES1=%2
  54. SET DDES=%3
  55.  
  56. rem cambia a unidad de disco duro para copiar en él.
  57. %des1%
  58. rem cambia a directorio acad
  59. cd\%ddes%
  60.  
  61. rem disco de programa, bloques, cuadros de dialogo, etc.
  62. :1
  63. ECHO INSERTE EL DISCO Nº1 EN LA DISQUETERA Y PULSE UNA TECLA
  64. PAUSE
  65. IF NOT EXIST %ORG%\acadlsp.exe GOTO 1
  66. :1A
  67. COPY %ORG%\acadlsp.exe
  68. COPY %ORG%\acadbi4.exe
  69. COPY %ORG%\acadexp.exe
  70. COPY %ORG%\aaa.exe
  71. COPY %ORG%\acaddwg.exe %des%\9
  72. COPY %ORG%\acad_sup.exe support
  73. COPY %ORG%\raiz.exe \
  74.  
  75.  
  76. :2      ;disco de .SLB
  77. ECHO INSERTE EL DISCO Nº2 EN LA DISQUETERA Y PULSE UNA TECLA
  78. PAUSE
  79. IF NOT EXIST %ORG%\23.exe GOTO 2
  80. :2A
  81. COPY %ORG%\23.exe support
  82.  
  83. ;desempaqueta parte fija:programa, menu, ...
  84. cd\ 
  85. ;ejecucion de raiz.exe
  86. raiz -y
  87. del raiz.exe
  88.  
  89. ;directorio acad
  90. cd %ddes%
  91. acadlsp -y
  92. acadbi4 -y
  93. acadexp -y
  94. rem acadexe -y
  95. del acadlsp.exe
  96. del acadbi4.exe
  97. del acadexp.exe
  98. rem del acadexe.exe
  99.  
  100. cd support
  101. acad_sup -y
  102. del acad_sup.exe
  103. 23 -y
  104. del 23.exe
  105.  
  106. cd\aderojas\9
  107. acaddwg -y
  108. del acaddwg.exe
  109.  
  110.  
  111. :ACADWIN
  112. IF NOT %DDES%==ACADWIN IF NOT %DDES%==acadwin goto 3
  113. ECHO INSERTE EL DISCO WINDOWS EN LA DISQUETERA Y PULSE UNA TECLA
  114. PAUSE
  115. IF NOT EXIST %ORG%\R54W.DLL GOTO ACADWIN
  116. COPY %org%\R54W.DLL %DES1%\ACADWIN
  117. COPY %org%\R54W.MN? %DES1%\ACADWIN\SUPPORT
  118. REN %DES1%\ACADWIN\ACADL.EXE *.OLD
  119. COPY %DES1%\ACADWIN\ACADLC.EXE %DES1%\ACADWIN\ACADL.EXE
  120. DEL %DES1%\ACADWIN\*.EXP
  121.  
  122.  
  123.  
  124.  
  125. :3
  126. ECHO INSERTE EL DISCO Nº3 EN LA DISQUETERA Y PULSE UNA TECLA
  127. PAUSE
  128. IF NOT EXIST %ORG%\aderojas.arj GOTO 3
  129. ;desempaquetado de libreria
  130. :3A
  131. rem cd \aderojas
  132. %des1%\arj x -u -v1440  %org%\aderojas \aderojas
  133.  
  134.  
  135.  
  136.  
  137. goto fin
  138.  
  139. :ERROR
  140. cls
  141. echo PARA INSTALAR EL PROGRAMA DEBE SEGUIR LOS SIGUIENTES PASOS:
  142. echo .
  143. echo 1.- SELECCIONE LA DISQUETERA A: o B:
  144. echo .
  145. echo 2.- INSERTE EL DISCO NUMERO 1, QUE CONTIENE EL FICHERO DE INSTALACION
  146. echo     Y COPIE EL FICHERO INSTR53.BAT EN EL DIRECTORIO RAIZ DEL
  147. ECHO     DISCO DURO DESTINO.
  148. ECHO .
  149. ECHO 3.- CAMBIE AL DIRECTORIO RAIZ DEL DISCO DURO DESTINO.
  150. echo .
  151. ECHO 4.- TECLEE:
  152. echo     INSTR53 (ORIGEN) (UNIDAD DISCO DURO) (DIRECTORIO CAD)
  153. ECHO .
  154. ECHO P.E. INSTR53 B: C: ACAD12
  155. echo      INSTR53 A: D: ACAD12     
  156. ECHO .
  157. echo . 
  158. echo ¡¡¡¡IMPORTANTE!!!!.
  159. echo           EL PROGRAMA DEBE INSTALARSE EN LA MISMA UNIDAD
  160. echo           DE DISCO QUE EL PROGRAMA AUTOCAD
  161. :FIN
  162.